<?
/*
		topGames: an iRC games bot
		Copyright (C) 2008 Marcos García <marcosgdf@gmail.com>
    
		This file is part of topGames

		This program is free software: you can redistribute it and/or modify
		it under the terms of the GNU General Public License as published by
		the Free Software Foundation, either version 3 of the License, or
		any later version.

		This program is distributed in the hope that it will be useful,
		but WITHOUT ANY WARRANTY; without even the implied warranty of
		MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
		GNU General Public License for more details.

		You should have received a copy of the GNU General Public License
		along with this program.  If not, see <http://www.gnu.org/licenses/>.
*/

class juegos {
	function action($tg,$nick,$canal,$data) { 
		$tg->addMoneyBote(1);
		if ($tg->isNickRegistered($nick)) {
			$ignored = $tg->isIgnored($nick);
			if (!$ignored) {
				if ($tg->isNickSuspended($nick)) {
					$tg->ircMsg($nick, 'Lo siento '.$tg->h($nick).', pero tu nick esta suspendido por los administradores de topGames, para mas informacion entra en '.P_CHANNEL, true);
					$tg->addIgnore($nick,60);
				}
				else {
					$tg->addLine($nick);
				}
			}
		}
		if (!isset($ignored) || ((isset($ignored) && ($ignored == false)))) {
			$command = str_replace(":","",strtolower($data[0]));
			if ($command == "!alta") $this->alta($tg,$nick,$canal);
			elseif ($command == "!baja") $this->baja($tg,$nick,$canal);
			elseif ($command == "!dinero") $this->dinero($tg,$nick,$canal);
			elseif ($command == "!dados") $this->dados($tg,$nick,$canal);
			elseif ($command == "!oca") $this->oca($tg,$nick,$canal);
			elseif ($command == "!lineas") $this->lineas($tg,$nick,$canal);
			elseif ($command == "!penalty") $this->penalty($tg,$nick,$canal,$data[1]);
			elseif ($command == "!comprar") $this->comprar($tg,$nick,$canal,$data[1],$data[2]);
			elseif ($command == "!doblar") $this->doblar($tg,$nick,$canal);
			elseif ($command == "!bote") $this->bote($tg,$nick,$canal);
			elseif ($command == "!ruleta") $this->ruleta($tg,$nick,$canal);
			elseif ($command == "!bancos") $this->bancos($tg,$nick,$canal);
			elseif ($command == "!banco") $this->banco($tg,$nick,$canal,$data[1]);
			elseif ($command == "!ingresar") $this->ingresar($tg,$nick,$canal,$data[1]);
			elseif ($command == "!retirar") $this->retirar($tg,$nick,$canal,$data[1]);
			elseif ($command == "!saldo") $this->saldo($tg,$nick,$canal);
			elseif ($command == "!transferencia") $this->transferencia($tg,$nick,$canal,$data[1],$data[2]);
		}
	}
	
	/**
	 * Function that answers to the command !alta, which signs up an user into the bot's database 
	 * @param $tg
	 * @param $nick
	 * @param $canal
	 * @return unknown_type
	 */
	function alta($tg,$nick,$canal) {
		if ($tg->isNickRegistered($nick)) {
			$tg->ircMsg($canal, $tg->h($nick).', tu ya estabas registrado en el bot. Puedes empezar a jugar con '.$tg->h('!dados').' y consultar tu dinero con '.$tg->h('!dinero'), true);
			$tg->checkFlood($nick);
		}
		else {
			if ($tg->isNickForbidden($nick)) {
				$tg->ircMsg($canal, 'Lo siento '.$tg->h($nick).' pero tu nick esta prohibido de cualquier uso del bot. Si tienes dudas entra en '.$tg->h(P_CHANNEL), true);
				$tg->addIgnore($nick,60);
			}
			else {
				$tg->newUser($nick,$canal);
				$tg->ircMsg($canal, 'Enhorabuena '.$tg->h($nick).'! Te acabas de dar de alta en el bot. Tienes un saldo inicial de'.$tg->h(' 1000').' topEuros y'.$tg->h(' 1').' topBono', true);
				$tg->ircMsg(CHANNEL, 'El usuario '.$tg->h($nick).' se acaba de dar de alta en el canal '.$tg->h($canal), true);
				$tg->addDefaultIgnore($nick);
			}
		}
	}
	
	function baja($tg,$nick,$canal) {
		if (!$tg->isNickRegistered($nick)) {
			$tg->msgNoRegistered($canal, $nick);
			$tg->checkFlood($nick);
		}
		else {
			$tg->ircMsg(CHANNEL, "El usuario ".$tg->h($nick)." se desea dar de baja del bot. Debería entrar en el canal oficial en unos segundos, de lo contrario, abrir un privado.");
			$tg->ircMsg($canal, "Para darte de baja del bot, entra en el canal ".P_CHANNEL.", donde te atenderá un operador", true);
			$tg->addDefaultIgnore($nick);
		}
	}
	
	/**
	 * Function that answers the command !dinero, which is to check how many money do you have in the game
	 * @param $tg
	 * @param $nick
	 * @param $canal
	 * @return unknown_type
	 */
	function dinero($tg,$nick,$canal) {
		if (!$tg->isNickRegistered($nick)) {
			$tg->msgNoRegistered($canal, $nick);
			$tg->checkFlood($nick);
		}
		else {
			$money = $tg->getMoney($nick);
			$bonos = $tg->getBonos($nick);
			$tg->ircMsg($canal, $tg->h($nick).", tienes un total de".$tg->h(" $money")." topEuros y de".$tg->h(" $bonos")." topBonos en tu monedero", true);
			$tg->addDefaultIgnore($nick);
		}
	}
	function dados($tg,$nick,$canal) {
		if (!$tg->isNickRegistered($nick)) {
			$tg->msgNoRegistered($canal, $nick);
			$tg->checkFlood($nick);
		}
		else {
			$money = $tg->getMoney($nick);
			if ($money < 30) {
				$tg->ircMsg($canal, "Lo siento ".$tg->h($nick).", pero necesitas un minimo de".$tg->h(' 30')." topEuros para poder jugar a los dados", true);
				$tg->checkFlood($nick);
			}
			else {
				$rand1 = rand(1,6);
				$rand2 = rand(1,6);
				$rand3 = rand(1,6);
				$rand4 = rand(1,6);
				$colors = array(3,4,7,10,12);
				$sumaTotal = $rand1 + $rand2 + $rand3 + $rand4;
				$textMessage = $tg->c($colors[rand(0,4)],' '.$rand1)." +".$tg->c($colors[rand(0,4)],' '.$rand2)." +".$tg->c($colors[rand(0,4)],' '.$rand3)." +".$tg->c($colors[rand(0,4)],' '.$rand4);
				$tg->ircMsg($canal, $tg->h($nick)." tira los dados con decision y...$textMessage ".$tg->c(5,'=')." $sumaTotal", true);
				if ($sumaTotal == 4) {
					$tg->ircMsg($canal, $tg->b('»')." ".$tg->c(10,'¡¡Premio!!')." ".$tg->h("$nick")." gana".$tg->h(' 1000')." topEuros y".$tg->h(' 1')." topBono!!!!");
					$tg->addMoney($nick,1000);
					$tg->addBonos($nick,1);
				}
				elseif ($sumaTotal == 5) $tg->ircMsg($canal, $tg->b('»')." Pero no ganas nada...");
				elseif ($sumaTotal == 6) {
					$tg->ircMsg($canal, $tg->b('»')." ".$tg->c(4,'Vaya...')." ".$tg->h("$nick")." pierde".$tg->h(' 80')." topEuros");
					$tg->delMoney($nick,80);
				}
				elseif ($sumaTotal == 7) $tg->ircMsg($canal, $tg->b('»')." Pero no ganas nada...");
				elseif ($sumaTotal == 8) {
					$tg->ircMsg($canal, $tg->b('»')." ".$tg->c(10,'¡¡Premio!!')." ".$tg->h("$nick")." gana".$tg->h(' 200')." topEuros!!!!");
					$tg->addMoney($nick,200);
				}
				elseif ($sumaTotal == 9) $tg->ircMsg($canal, $tg->b('»')." Pero no ganas nada...");
				elseif ($sumaTotal == 10) {
					$tg->ircMsg($canal, $tg->b('»')." ".$tg->c(4,'Vaya...')." ".$tg->h("$nick")." pierde".$tg->h(' 80')." topEuros");
					$tg->delMoney($nick,80);
				}
				elseif ($sumaTotal == 11) $tg->ircMsg($canal, $tg->b('»')." Pero no ganas nada...");
				elseif ($sumaTotal == 12) {
					$tg->ircMsg($canal, $tg->b('»')." ".$tg->c(4,'Vaya...')." ".$tg->h("$nick")." pierde".$tg->h(' 80')." topEuros");
					$tg->delMoney($nick,80);
				}
				elseif ($sumaTotal == 13) {
					$tg->ircMsg($canal, $tg->b('»')." ".$tg->c(10,'¡¡Premio!!')." ".$tg->h("$nick")." gana".$tg->h(' 300')." topEuros!!!!");
					$tg->addMoney($nick,300);
				}
				elseif ($sumaTotal == 14) $tg->ircMsg($canal, $tg->b('»')." Pero no ganas nada...");
				elseif ($sumaTotal == 15) {
					$tg->ircMsg($canal, $tg->b('»')." ".$tg->c(10,'¡¡Premio!!')." ".$tg->h("$nick")." gana".$tg->h(' 300')." topEuros!!!!");
					$tg->addMoney($nick,300);
				}
				elseif ($sumaTotal == 16) {
					$tg->ircMsg($canal, $tg->b('»')." ".$tg->c(4,'Vaya...')." ".$tg->h("$nick")." pierde".$tg->h(' 500')." topEuros");
					$tg->delMoney($nick,500);
				}
				elseif ($sumaTotal == 17) {
					$tg->ircMsg($canal, $tg->b('»')." ".$tg->c(10,'¡¡Premio!!')." ".$tg->h("$nick")." gana".$tg->h(' 600')." topEuros!!!!");
					$tg->addMoney($nick,600);
				}
				elseif ($sumaTotal == 18) {
					$tg->ircMsg($canal, $tg->b('»')." ".$tg->c(10,'¡¡Premio!!')." ".$tg->h("$nick")." gana".$tg->h(' 600')." topEuros!!!!");
					$tg->addMoney($nick,600);
				}
				elseif ($sumaTotal == 19) $tg->ircMsg($canal, $tg->b('»')." Pero no ganas nada...");
				elseif ($sumaTotal == 20) {
					$tg->ircMsg($canal, $tg->b('»')." ".$tg->c(4,'Vaya...')." ".$tg->h("$nick")." pierde".$tg->h(' 500')." topEuros");
					$tg->delMoney($nick,500);
				}
				elseif ($sumaTotal == 21) $tg->ircMsg($canal, $tg->b('»')." Pero no ganas nada...");
				elseif ($sumaTotal == 22) {
					$tg->ircMsg($canal, $tg->b('»')." ".$tg->c(4,'Vaya...')." ".$tg->h("$nick")." pierde".$tg->h(' 500')." topEuros");
					$tg->delMoney($nick,500);
				}
				elseif ($sumaTotal == 23) {
					$tg->ircMsg($canal, $tg->b('»')." ".$tg->c(10,'¡¡Premio!!')." ".$tg->h("$nick")." gana".$tg->h(' 600')." topEuros!!!!");
					$tg->addMoney($nick,600);
				}
				elseif ($sumaTotal == 24) {
					$tg->ircMsg($canal, $tg->b('»')." ".$tg->c(10,'¡¡Premio!!')." ".$tg->h("$nick")." gana".$tg->h(' 1')." topBono!!!!");
					$tg->addBonos($nick,1);
				}
				$tg->addDefaultIgnore($nick);
			}
		}
	}
	function auxOca($tg,$nick,$canal,$showMsg=true) {
		$query = $tg->dbSend("SELECT casilla FROM ".DB_PREFIX."oca WHERE `nick`='$nick' AND `is_finished`='0'");
		$result = mysql_num_rows($query);
		if (!$result) {
			$tg->ircMsg($canal, $tg->h($nick).", comienzas una nueva partida de la oca!", true);
			$tg->ircMsg(CHANNEL, "El usuario ".$tg->h($nick)." empieza una nueva partida de la oca en el canal ".$tg->h($canal), true);
			$tg->dbSend("INSERT INTO ".DB_PREFIX."oca SET `nick`='$nick', `ctime`='".time()."', `casilla`='1'");
			$casillaActual = 1;
		}
		else $casillaActual = mysql_result($query,0);
		$query = $tg->dbSend("SELECT penalizacion FROM ".DB_PREFIX."oca WHERE `nick`='$nick' AND `is_finished`='0'");
		$pastPenalizacion = mysql_result($query,0);
		if ($pastPenalizacion > 0) {
			$postPenalizacion = $pastPenalizacion - 1;
			$tg->ircMsg($canal, $tg->h($nick).", acabas de perder un turno. Te quedan".$tg->h(' '.$postPenalizacion)." turnos para reanudar el juego", true);
			$tg->dbSend("UPDATE ".DB_PREFIX."oca SET `penalizacion`='$postPenalizacion' WHERE `nick`='$nick' AND `is_finished`='0'");
			$tg->addDefaultIgnore($nick);
		}
		else {
			$dado = rand(1,6);
			$colores = array(3,4,7,10,12);
			if ($showMsg) $tg->ircMsg($canal, $tg->h($nick).", tiras el dado con fuerza y sacas un...".$tg->c(rand(0,4)," $dado")."!", true);
			$casilla = $casillaActual + $dado;
			$tg->setCasillaOca($nick,$casilla);
			if ($casilla == 1) $tg->ircMsg($canal,$tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." Adelantas a la casilla".$tg->h(" $casilla"));
			elseif ($casilla == 3) $tg->ircMsg($canal,$tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." Adelantas a la casilla".$tg->h(" $casilla"));
			elseif ($casilla == 4) $tg->ircMsg($canal,$tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." Adelantas a la casilla".$tg->h(" $casilla"));
			elseif ($casilla == 5) { 
				$tg->ircMsg($canal, $tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." De oca en oca y tiro ".$tg->b('¡¡porque me toca!!'));
				$tg->setCasillaOca($nick,9);
				$this->auxOca($tg,$nick,$canal, false);
			}
			elseif ($casilla == 6) {
				$tg->ircMsg($canal, $tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." De puente en puente y tiro ".$tg->b('¡¡porque me lleva la corriente!!'));
				$tg->setCasillaOca($nick,12);
				$this->auxOca($tg,$nick,$canal);
			}
			elseif ($casilla == 7) $tg->ircMsg($canal,$tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." Adelantas a la casilla".$tg->h(" $casilla"));
			elseif ($casilla == 8) $tg->ircMsg($canal,$tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." Adelantas a la casilla".$tg->h(" $casilla"));
			elseif ($casilla == 9) { 
				$tg->ircMsg($canal, $tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." De oca en oca y tiro ".$tg->b('¡¡porque me toca!!'));
				$tg->setCasillaOca($nick,14);
				$this->auxOca($tg,$nick,$canal, false);
			}
			elseif ($casilla == 10) $tg->ircMsg($canal,$tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." Adelantas a la casilla".$tg->h(" $casilla"));
			elseif ($casilla == 11) $tg->ircMsg($canal,$tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." Adelantas a la casilla".$tg->h(" $casilla"));
			elseif ($casilla == 12) {
				$tg->ircMsg($canal, $tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." De puente en puente y tiro ".$tg->b('¡¡porque me lleva la corriente!!'));
				$tg->setCasillaOca($nick,6);
				$this->auxOca($tg,$nick,$canal, false);
			}
			elseif ($casilla == 13) $tg->ircMsg($canal,$tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." Adelantas a la casilla".$tg->h(" $casilla"));
			elseif ($casilla == 14) { 
				$tg->ircMsg($canal, $tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." De oca en oca y tiro ".$tg->b('¡¡porque me toca!!'));
				$tg->setCasillaOca($nick,18);
				$this->auxOca($tg,$nick,$canal, false);
			}
			elseif ($casilla == 15) $tg->ircMsg($canal,$tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." Adelantas a la casilla".$tg->h(" $casilla"));
			elseif ($casilla == 16) $tg->ircMsg($canal,$tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." Adelantas a la casilla".$tg->h(" $casilla"));
			elseif ($casilla == 17) $tg->ircMsg($canal,$tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." Adelantas a la casilla".$tg->h(" $casilla"));
			elseif ($casilla == 18) { 
				$tg->ircMsg($canal, $tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." De oca en oca y tiro ".$tg->b('¡¡porque me toca!!'));
				$tg->setCasillaOca($nick,23);
				$this->auxOca($tg,$nick,$canal, false);
			}
			elseif ($casilla == 19) $this->auxOca($tg,$nick,$canal);
			elseif ($casilla == 20) $tg->ircMsg($canal,$tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." Adelantas a la casilla".$tg->h(" $casilla"));
			elseif ($casilla == 21) $tg->ircMsg($canal,$tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." Adelantas a la casilla".$tg->h(" $casilla"));
			elseif ($casilla == 22) $tg->ircMsg($canal,$tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." Adelantas a la casilla".$tg->h(" $casilla"));
			elseif ($casilla == 23) { 
				$tg->ircMsg($canal, $tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." De oca en oca y tiro ".$tg->b('¡¡porque me toca!!'));
				$tg->setCasillaOca($nick,27);
				$this->auxOca($tg,$nick,$canal, false);
			}
			elseif ($casilla == 24) $tg->ircMsg($canal,$tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." Adelantas a la casilla".$tg->h(" $casilla"));
			elseif ($casilla == 25) $tg->ircMsg($canal,$tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." Adelantas a la casilla".$tg->h(" $casilla"));
			elseif ($casilla == 26) {
				$tg->ircMsg($canal, $tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." De dado a dado y tiro... ¡¡porque me ha tocado!!");
				$tg->setCasillaOca($nick,53);
				$this->auxOca($tg,$nick,$canal, false);
			}
			elseif ($casilla == 27) $this->auxOca($tg,$nick,$canal);
			elseif ($casilla == 28) $tg->ircMsg($canal,$tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." Adelantas a la casilla".$tg->h(" $casilla"));
			elseif ($casilla == 29) $tg->ircMsg($canal,$tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." Adelantas a la casilla".$tg->h(" $casilla"));
			elseif ($casilla == 30) $tg->ircMsg($canal,$tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." Adelantas a la casilla".$tg->h(" $casilla"));
			elseif ($casilla == 31) $tg->ircMsg($canal,$tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." Adelantas a la casilla".$tg->h(" $casilla"));
			elseif ($casilla == 32) {
				$tg->ircMsg($canal, $tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." De oca en oca y tiro ".$tg->b('¡¡porque me toca!!'));
				$tg->setCasillaOca($nick,35);
				$this->auxOca($tg,$nick,$canal, false);
			}
			elseif ($casilla == 33) $tg->ircMsg($canal,$tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." Adelantas a la casilla".$tg->h(" $casilla"));
			elseif ($casilla == 34) $tg->ircMsg($canal,$tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." Adelantas a la casilla".$tg->h(" $casilla"));
			elseif ($casilla == 35) $tg->ircMsg($canal,$tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." Adelantas a la casilla".$tg->h(" $casilla"));
			elseif ($casilla == 36) { 
				$tg->ircMsg($canal, $tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." De oca en oca y tiro ".$tg->b('¡¡porque me toca!!'));
				$tg->setCasillaOca($nick,41);
				$this->auxOca($tg,$nick,$canal, false);
			}
			elseif ($casilla == 37) $tg->ircMsg($canal,$tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." Adelantas a la casilla".$tg->h(" $casilla"));
			elseif ($casilla == 38) $tg->ircMsg($canal,$tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." Adelantas a la casilla".$tg->h(" $casilla"));
			elseif ($casilla == 39) $tg->ircMsg($canal,$tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." Adelantas a la casilla".$tg->h(" $casilla"));
			elseif ($casilla == 40) $tg->ircMsg($canal,$tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." Adelantas a la casilla".$tg->h(" $casilla"));
			elseif ($casilla == 41) { 
				$tg->ircMsg($canal, $tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." De oca en oca y tiro ".$tg->b('¡¡porque me toca!!'));
				$tg->setCasillaOca($nick,45);
				$this->auxOca($tg,$nick,$canal, false);
			}
			elseif ($casilla == 42) {
				$tg->ircMsg($canal, $tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." Ups! Me parece que te has perdido en el laberinto... ¡Has vuelto a la casilla 30!");
				$tg->setCasillaOca($nick,30);
			}
			elseif ($casilla == 43) $tg->ircMsg($canal,$tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." Adelantas a la casilla".$tg->h(" $casilla"));
			elseif ($casilla == 44) $tg->ircMsg($canal,$tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." Adelantas a la casilla".$tg->h(" $casilla"));
			elseif ($casilla == 45) { 
				$tg->ircMsg($canal,$tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." De oca en oca y tiro ".$tg->b('¡¡porque me toca!!'));
				$tg->setCasillaOca($nick,50);
				$this->auxOca($tg,$nick,$canal, false);
			}
			elseif ($casilla == 46) $tg->ircMsg($canal,$tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." Adelantas a la casilla".$tg->h(" $casilla"));
			elseif ($casilla == 47) $tg->ircMsg($canal,$tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." Adelantas a la casilla".$tg->h(" $casilla"));
			elseif ($casilla == 48) $tg->ircMsg($canal,$tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." Adelantas a la casilla".$tg->h(" $casilla"));
			elseif ($casilla == 49) $tg->ircMsg($canal,$tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." Adelantas a la casilla".$tg->h(" $casilla"));
			elseif ($casilla == 50) { 
				$tg->ircMsg($canal, $tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." De oca en oca y tiro ".$tg->b('¡¡porque me toca!!'));
				$tg->setCasillaOca($nick,54);
				$this->auxOca($tg,$nick,$canal, false);
			}
			elseif ($casilla == 51) $tg->ircMsg($canal,$tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." Adelantas a la casilla".$tg->h(" $casilla"));
			elseif ($casilla == 52) {
				$tg->ircMsg($canal, $tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." ".$tg->c(3,'Te han pillado! La policia ha averiguado tus intenciones, asi que pierdes tres turnos'));
				$tg->dbSend("UPDATE ".DB_PREFIX."oca SET `penalizacion`='3' WHERE `nick`='$nick' AND `is_finished`='0'");
			}
			elseif ($casilla == 53) {
				$tg->ircMsg($canal, $tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." De dado a dado y tiro... ¡¡porque me ha tocado!!");
				$tg->setCasillaOca($nick,26);
				$this->auxOca($tg,$nick,$canal, false);
			}
			elseif ($casilla == 54) { 
				$tg->ircMsg($canal, $tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." De oca en oca y tiro ".$tg->b('¡¡porque me toca!!')); 
				$tg->setCasillaOca($nick,59);
				$this->auxOca($tg,$nick,$canal, false);
			}
			elseif ($casilla == 55) $tg->ircMsg($canal, $tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." Adelantas a la casilla".$tg->h(" $casilla"));
			elseif ($casilla == 56) $tg->ircMsg($canal, $tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." Adelantas a la casilla".$tg->h(" $casilla"));
			elseif ($casilla == 57) $tg->ircMsg($canal, $tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." Adelantas a la casilla".$tg->h(" $casilla"));
			elseif ($casilla == 58) {
				$tg->ircMsg($canal, $tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." ".$tg->c(4,'Puff... me parece que tienes que volver a empezar...'));
				$tg->setCasillaOca($nick,0);
			}
			elseif ($casilla == 59) { 
				$tg->ircMsg($canal, $tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." De oca en oca y tiro ".$tg->b('¡¡porque me toca!!'));
				$tg->setCasillaOca($nick,63);
				$this->winOca($tg,$nick,$canal);
			}
			elseif ($casilla == 60) $tg->ircMsg($canal, $tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." Adelantas a la casilla".$tg->h(" $casilla"));
			elseif ($casilla == 61) $tg->ircMsg($canal, $tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." Adelantas a la casilla".$tg->h(" $casilla"));
			elseif ($casilla == 62) $tg->ircMsg($canal, $tg->b('»').$tg->c(10,' '.$casillaActual)." ".$tg->b('»')." Adelantas a la casilla".$tg->h(" $casilla"));
			elseif ($casilla == 63) $this->winOca($tg,$nick,$canal);
			elseif ($casilla > 63) {
				$casilla = 63 - ($casilla - 63);
				$tg->setCasillaOca($nick,$casilla);
				$tg->ircMsg($canal, $tg->b('»').$tg->c(10,' 63')." ".$tg->b('»')." Retrocedes a la casilla $casilla");
			}
		}
	}
	function winOca($tg,$nick,$canal) {
		$tg->ircMsg($canal, "Genial!!!! ".$tg->h($nick).", has completado el tablero, y como recompensa ganas".$tg->h(' 10.000')." topEuros!!!", true);
		$tg->dbSend("UPDATE ".DB_PREFIX."oca SET `is_finished`='1' WHERE `nick`='$nick' AND `is_finished`='0'");
		$query = $tg->dbSend("SELECT COUNT(id) FROM ".DB_PREFIX."oca WHERE `nick`='$nick'  AND `is_finished`='1'");
		$result = mysql_result($query,0);
		$tg->ircMsg(CHANNEL, "El usuario ".$tg->h($nick)." ha completado el juego de la oca. Juegos totales:".$tg->h(" $result"), true);
		$tg->addMoney($nick,10000);
	}
	function oca($tg,$nick,$canal) {
		if (!$tg->isNickRegistered($nick)) {
			$tg->msgNoRegistered($canal,$nick);
			$tg->checkFlood($nick);
		}
		else {
			$bonos = $tg->getBonos($nick);
			if ($bonos < 2) {
				$tg->ircMsg($canal, "Lo siento ".$tg->h($nick).", pero necesitas".$tg->h(' 2')." topBonos para poder jugar a la oca", true);
				$tg->checkFlood($nick);
			}
			else {
				$tg->delBonos($nick,2);
				$tg->addDefaultIgnore($nick);
				$this->auxOca($tg,$nick,$canal);
			}
		}
	}
	function penalty($tg,$nick,$canal,$data) {
		if (!$tg->isNickRegistered($nick)) {
			$tg->msgNoRegistered($canal,$nick);
			$tg->checkFlood($nick);
		}
		else {
			$money = $tg->getMoney($nick);
			if ($money < 800) {
				$tg->ircMsg($canal, "Lo siento ".$tg->h($nick).", pero necesitas".$tg->h(' 800')." topEuros para poder tirar un penalty", true);
				$tg->checkFlood($nick);
			}
			else {
				if ($data != "izq" && ($data != "der") && ($data != "centro")) {
					$tg->msgSintaxError($canal, $tg->h('!penalty izq/centro/der'));
					$tg->checkFlood($nick);
				}
				else {
					$tg->delMoney($nick,800);
					$tg->addDefaultIgnore($nick);
					$lucky = rand(1,100) % 2;
					if ($data == "izq") {
						$tg->ircMsg($canal, $tg->h($nick)." se dispone a tirar el penalty a la izquierda de la porteria con todas tus fuerzas y...", true);
						if (!$lucky) {
							$tg->dbSend("INSERT INTO ".DB_PREFIX."goles SET `ctime`='".time()."', `user`='$nick', `type`='g'");
							$premio = array(10,100,1000);
							$premio = $premio[rand(0,2)];
							$mensaje = array('Menudo furolazooo!!!! Madre miaaa!!! '.$this->portero.' ha salido lesionado del tiro!!!!','Me parece que '.$tg->portero.' esto se lo toma a coña','Oleee!!! Ese pedazo goolll!!!','GOOOOOOLLLL!!!! El publico grita victorioso!!!!');
							$mensaje = $mensaje[rand(0,3)];
							$tg->ircMsg($canal, $tg->b('»')." ".$tg->c(10,"Goooolll...")." $mensaje. Ganas".$tg->h(" $premio")." topEuros", true);
							$tg->addMoney($nick,$premio);
						}
						else {
							$tg->dbSend("INSERT INTO ".DB_PREFIX."goles SET `ctime`='".time()."', `user`='$nick', `type`='f'");
							$mensaje = array('Visto y no visto! Menudo paradon de '.$tg->portero.'!!!!!','Pufff... tienes que mejorar la tecnica, parece que te has pasado'.$tg->h(" $lucky").' pueblos','Pretendes tirar con esa fuerza? Si practicamente ha ido rodando!!');
							$mensaje = $mensaje[rand(0,2)];
							$tg->ircMsg($canal, $tg->b('»')." ".$tg->c(4,"Fallas...")." $mensaje", true);
						}
					} elseif ($data == "centro") {
						$tg->ircMsg($canal, $tg->h($nick)." se dispone a tirar el penalty a la izquierda de la porteria con todas tus fuerzas y...", true);
						if (!$lucky) {
							$tg->dbSend("INSERT INTO ".DB_PREFIX."goles SET `ctime`='".time()."', `user`='$nick', `type`='g'");
							$premio = array(10,100,1000);
							$premio = $premio[rand(0,2)];
							$mensaje = array('Menudo furolazooo!!!! Madre miaaa!!! '.$this->portero.' ha salido lesionado del tiro!!!!','Me parece que '.$tg->portero.' esto se lo toma a coña','Oleee!!! Ese pedazo goolll!!!','GOOOOOOLLLL!!!! El publico grita victorioso!!!!');
							$mensaje = $mensaje[rand(0,3)];
							$tg->ircMsg($canal, $tg->b('»')." ".$tg->c(10,"Goooolll...")." $mensaje. Ganas".$tg->h(" $premio")." topEuros", true);
							$tg->addMoney($nick,$premio);
						}
						else {
							$tg->dbSend("INSERT INTO ".DB_PREFIX."goles SET `ctime`='".time()."', `user`='$nick', `type`='f'");
							$mensaje = array('Visto y no visto! Menudo paradon de '.$tg->portero.'!!!!!','Pufff... tienes que mejorar la tecnica, parece que te has pasado'.$tg->h(" $lucky").' pueblos','Pretendes tirar con esa fuerza? Si practicamente ha ido rodando!!');
							$mensaje = $mensaje[rand(0,2)];
							$tg->ircMsg($canal, $tg->b('»')." ".$tg->c(4,"Fallas...")." $mensaje", true);
						}
					} elseif ($data == "der") {
						$tg->ircMsg($canal, $tg->h($nick)." se dispone a tirar el penalty a la izquierda de la porteria con todas tus fuerzas y...", true);
						if (!$lucky) {
							$tg->dbSend("INSERT INTO ".DB_PREFIX."goles SET `ctime`='".time()."', `user`='$nick', `type`='g'");
							$premio = array(10,100,1000);
							$premio = $premio[rand(0,2)];
							$mensaje = array('Menudo furolazooo!!!! Madre miaaa!!! '.$tg->portero.' ha salido lesionado del tiro!!!!','Me parece que '.$tg->portero.' esto se lo toma a coña','Oleee!!! Ese pedazo goolll!!!','GOOOOOOLLLL!!!! El publico grita victorioso!!!!');
							$mensaje = $mensaje[rand(0,3)];
							$tg->ircMsg($canal, $tg->b('»')." ".$tg->c(10,"Goooolll...")." $mensaje. Ganas".$tg->h(" $premio")." topEuros", true);
							$tg->addMoney($nick,$premio);
						}
						else {
							$tg->dbSend("INSERT INTO ".DB_PREFIX."goles SET `ctime`='".time()."', `user`='$nick', `type`='f'");
							$mensaje = array('Visto y no visto! Menudo paradon de '.$tg->portero.'!!!!!','Pufff... tienes que mejorar la tecnica, parece que te has pasado'.$tg->h(" $lucky").' pueblos','Pretendes tirar con esa fuerza? Si practicamente ha ido rodando!!');
							$mensaje = $mensaje[rand(0,2)];
							$tg->ircMsg($canal, $tg->b('»')." ".$tg->c(4,"Fallas...")." $mensaje", true);
						}
					}
				}
			}
		}
	}
	function comprar($tg,$nick,$canal,$type,$quantity) {
		if (!$tg->isNickRegistered($nick)) {
			$tg->msgNoRegistered($canal,$nick);
			$tg->checkFlood($nick);
		}
		else {
			if ($type != "bono" && ($type != "dinero")) {
				$tg->msgSintaxError($canal, $tg->h("!comprar bono/dinero cantidad"));
				$tg->checkFlood($nick);
			} elseif (empty($quantity) || (!is_numeric($quantity))) {
				$tg->msgSintaxError($canal, $tg->h("!comprar bono/dinero cantidad"));
				$tg->checkFlood($nick);
			}
			else {
				settype($quantity,'string');
				$tg->addDefaultIgnore($nick);
				if ($type == "bono") {
					$money = $tg->getMoney($nick);
					$toPay = 1500 * $quantity;
					if ($toPay > $money) {
						$tg->ircMsg($canal, "Lo siento ".$tg->h($nick).", pero no tienes suficiente dinero como para comprar".$tg->h(" $quantity")." topBonos", true);
						$tg->checkFlood($nick);
					}
					else {
						$tg->delMoney($nick,$toPay);
						$tg->addBonos($nick,$quantity);
						$tg->ircMsg($canal, "Gracias ".$tg->h($nick)." por comprar".$tg->h(" $quantity")." topBonos con nosotros", true);
					}
				} elseif ($type == "dinero") {
					$bonos = $tg->getBonos($nick);
					$toGet = 1000 * $quantity;
					if ($quantity > $bonos) {
						$tg->ircMsg($canal, "Lo siento ".$tg->h($nick)." pero no tienes suficiente dinero como para comprar".$tg->h(" $toGet")." topEuros (necesitas".$tg->h(" $toGet")." topBonos)", true);
						$tg->checkFlood($nick);
					}
					else {
						$tg->delBonos($nick,$quantity);
						$tg->addMoney($nick,$toGet);
						$tg->ircMsg($canal, "Gracias ".$tg->h($nick)." por comprar".$tg->h(" $toGet")." topEuros con nosotros", true);
					}
				}
			}
		}
	}
	function lineas($tg,$nick,$canal) {
		if (!$tg->isNickRegistered($nick)) {
			$tg->msgNoRegistered($canal,$nick);
			$tg->checkFlood($nick);
		}
		else {
			$tg->addDefaultIgnore($nick);
			$lines = $tg->getLines($nick);
			$nivel = $tg->getLevel($nick, $lines);
			$postLevel = $nivel + 1;
			$postLines = $tg->getLevelLines($postLevel);
			$remainingLines = $postLines - $lines;
			$tg->ircMsg($canal, $tg->h($nick).", has escrito".$tg->h(" $lines")." lineas. Estas en el nivel".$tg->h(" $nivel")." y te quedan".$tg->h(" $remainingLines")." lineas para subir al nivel".$tg->h(" $postLevel"), true);
		}
	}
	function doblar($tg,$nick,$canal) {
		if (!$tg->isNickRegistered($nick)) {
			$tg->msgNoRegistered($canal,$nick);
			$tg->checkFlood($nick);
		}
		else {
			$tg->ircMsg($canal, $tg->h($nick)." se lo juega todo en esta tirada y...", true);
			$lucky = rand(1,2);
			$tg->addDefaultIgnore($nick);
			if ($lucky == 1) {
				$lucky = rand(1,3);
				$money = $tg->getMoney($nick);
				$bonos = $tg->getBonos($nick);
				$postMoney = bcdiv($money,$lucky,0);
				$postBonos = bcdiv($bonos,$lucky,0);
				if ($lucky != 1) {
					$ivaBote = $tg->dbSend("SELECT valor FROM ".DB_PREFIX."settings WHERE `campo`='bote_percent'");
					$result = mysql_result($ivaBote,0);
					$ivaBote = $result / 100;
					$boteMoney = bcdiv($postMoney,$ivaBote,0);
					$boteBonos = bcdiv($postBonos,$ivaBote,0);
					$tg->addMoneyBote($boteMoney);
					$tg->addBonosBote($boteBonos);
					$tg->setMoney($nick,$postMoney);
					$tg->setBonos($nick,$postBonos);
				}
				$tg->ircMsg($canal, $tg->b('»')." ".$tg->b($tg->c(4,'¡DIVIDE!'))." ".$tg->h($nick)." divide todo entre".$tg->h(" $lucky").". Ahora te quedas con".$tg->h(" $postMoney")." topEuros y".$tg->h(" $postBonos")." topBonos");
				$tg->ircMsg(CHANNEL, "El usuario ".$tg->h($nick)." ".$tg->b($tg->c(4,'DIVIDE'))." todo su dinero entre".$tg->h(" $lucky")." en el canal".$tg->h(" $canal"), true);
			}
			elseif ($lucky == 2) {
				$lucky = rand(1,3);
				$money = $tg->getMoney($nick);
				$bonos = $tg->getBonos($nick);
				$postMoney = bcmul($money,$lucky,0);
				$postBonos = bcmul($bonos,$lucky,0);
				$tg->setMoney($nick,$postMoney);
				$tg->setBonos($nick,$postBonos);
				$tg->ircMsg($canal, $tg->b('»')." ".$tg->b($tg->c(3,'¡MULTIPLICA!'))." ".$tg->h($nick)." multiplica todo por".$tg->h(" $lucky").". Ahora tienes".$tg->h(" $postMoney")." topEuros y".$tg->h(" $postBonos")." topBonos");
				$tg->ircMsg(CHANNEL, "El usuario ".$tg->h($nick)." ".$tg->b($tg->c(3,'MULTIPLICA'))." todo su dinero por".$tg->h(" $lucky")." en el canal".$tg->h(" $canal"), true);
			}
		}
	}
	function bote($tg,$nick,$canal) {
		if (!$tg->isNickRegistered($nick)) {
			$tg->msgNoRegistered($canal, $nick);
			$tg->checkFlood($nick);
		}
		else {
			$tg->addDefaultIgnore($nick);
			$boteMoney = $tg->getMoneyBote();
			$boteBonos = $tg->getBonosBote();
			$tg->ircMsg($canal, $tg->h($nick).", en el bote hay un total de".$tg->h(" $boteMoney")." topEuros y".$tg->h(" $boteBonos")." topBonos", true);
		}
	}
	function ruleta($tg,$nick,$canal) {
		if (!$tg->isNickRegistered($nick)) {
			$tg->msgNoRegistered($canal, $nick);
			$tg->checkFlood($nick);
		}
		else {
			$tg->ircMsg($canal, $tg->h($nick)." tira de la ruleta con todas sus fuerzas y...", true);
			$lucky = rand(1,4);
			if ($lucky == 1) {
				$tg->ircMsg(CHANNEL,"El usuario".$tg->h(" $nick")." se lleva el bote ".$tg->b($tg->c(3,'VERDE'))." en el canal ".$tg->h($canal), true);
				$money = $tg->getMoney($nick);
				$boteMoney = $tg->getMoneyBote();
				$tg->eraseMoneyBote();
				$tg->addMoney($nick,$boteMoney);
				$tg->ircMsg($canal, $tg->b('»')." ".$tg->b($tg->c(3,'VERDE'))." ".$tg->h("$nick")." cae en la casilla ".$tg->c(3,'verde')." y se lleva los".$tg->h(" $boteMoney")." topEuros del bote");
			} elseif ($lucky == 2) {
				$tg->ircMsg(CHANNEL,"El usuario".$tg->h(" $nick")." ".$tg->b($tg->c(4,'PIERDE TODO'))." en el canal ".$tg->h($canal), true);
				$money = $tg->getMoney($nick);
				$bonos = $tg->getBonos($nick);
				$moneyBote = $tg->getMoneyBote();
				$ivaBote = $tg->dbSend("SELECT valor FROM ".DB_PREFIX."settings WHERE `campo`='bote_percent'");
				$result = mysql_result($ivaBote,0);
				$ivaBote = $result / 100;
				$boteMoney = bcdiv($money,$ivaBote,0);
				$boteBonos = bcdiv($bonos,$ivaBote,0);
				$tg->addMoneyBote($boteMoney);
				$tg->addBonosBote($boteBonos);
				$tg->delMoney($nick,$money);
				$tg->delBonos($nick,$bonos);
				$tg->ircMsg($canal, $tg->b('»')." ".$tg->b($tg->c(4,'¡ROJO!'))." ".$tg->h($nick)." cae en la casilla ".$tg->c(4,'roja')." y todos sus".$tg->h(" $money")." topEuros y sus".$tg->h(" $bonos")." topBonos se van al bote");
				$tg->ircMsg($canal, $tg->b('»')." Recibes".$tg->h(' 500')." topEuros para amortizar la pÈrdida");
			} elseif ($lucky == 3) {
				$tg->ircMsg(CHANNEL,"El usuario".$tg->h(" $nick")." se lleva el bote ".$tg->b($tg->h('AZUL'))." en el canal ".$tg->h($canal), true);
				$bonos = $tg->getBonos($nick);
				$bonosBote = $tg->getBonosBote($nick);
				$tg->eraseBonosBote();
				$tg->addBonos($nick,$bonosBote);
				$tg->ircMsg($canal, $tg->b('»')." ".$tg->b($tg->h('¡AZUL!'))." ".$tg->h($nick)." cae en la casilla ".$tg->h('roja')." y se lleva los".$tg->h(" $bonosBote")." topBonos");
			} elseif ($lucky == 4) {
				$tg->ircMsg(CHANNEL,"El usuario".$tg->h(" $nick")." se lleva el bote ".$tg->b($tg->c(7,'NARANJA'))." en el canal ".$tg->h($canal), true);
				$moneyBote = $tg->getMoneyBote();
				$bonosBote = $tg->getBonosBote();
				$tg->eraseBote();
				$tg->addMoney($nick,$moneyBote);
				$tg->addBonos($nick,$bonosBote);
				$tg->ircMsg($canal, $tg->b('»')." ".$tg->b($tg->c(7,'¡NARANJA!'))." ".$tg->h($nick)." cae en la casilla ".$tg->c(7,'naranja')." y se lleva los".$tg->h(" $bonosBote")." topEuros y los".$tg->h(" $moneyBote")." topBonos del bote");
			}
			$tg->addDefaultIgnore($nick);
		}
	}
	function bancos($tg,$nick,$channel) {
		if (!$tg->isNickRegistered($nick)) {
			$tg->msgNoRegistered($channel,$nick);
			$tg->checkFlood($nick);
		}
		else {
			$tg->ircMsg($channel, $tg->h($nick).", puedes consultar los bancos disponibles en ".WEB_INFOBANKS, true);
			$tg->addDefaultIgnore($nick);
		}
	}
	function banco($tg,$nick,$channel,$data) {
		if (!$tg->isNickRegistered($nick)) {
			$tg->msgNoRegistered($channel,$nick);
			$tg->checkFlood($nick);
		}
		else {
			if (empty($data)) {
				$tg->msgSintaxError($channel, '!banco banco');
				$tg->checkFlood($nick);
			}
			else {
				$disponibles = array('topbanco','interbanco','banconacional');
				$bank = strtolower($data);
				if (!in_array($bank,$disponibles)) {
					$tg->ircMsg($channel, $tg->h($nick).", escribe !bancos para saber los bancos que estan disponibles", true);
					$tg->checkFlood($nick);
				}
				else {
					$hasBank = $tg->getBank($nick);
					if ($hasBank) {
						$tg->ircMsg($channel, $tg->h($nick).", para cambiar de banco tienes que solicitarlo en el canal oficial ".P_CHANNEL, true);
						$tg->checkFlood($nick);
					}
					else {
						if ($bank == 'topbanco') {
							$tg->ircMsg($channel, $tg->h($nick).", bienvenido al topBanco. El banco en el que recibes lo que tu das", true);
							$tg->setBank($nick,$bank);
						} elseif ($bank == 'interbanco') {
							$money = $tg->getMoney($nick);
							if ($money < 100) {
								$tg->ircMsg($channel, $tg->h($nick).", para poder abrir una cuenta en el interbanco, necesitas".$tg->h(' 100')." topEuros", true);
								$tg->checkFlood($nick);
							}
							else {
								$tg->ircMsg($channel, $tg->h($nick).", bienvenido al interbanco: las mejores prestaciones a un precio asequible", true);
								$tg->setBank($nick,$bank);
							}
						} elseif ($bank == 'banconacional') {
							$money = $tg->getMoney($nick);
							if ($money < 500) {
								$tg->ircMsg($channel, $tg->h($nick).", para poder abrir una cuenta en el bancoNacional necesitas".$tg->h(' 500')." topEuros", true);
								$tg->checkFlood($nick);
							}
							else {
								$tg->ircMsg($channel, $tg->h($nick).", bienvenido al bancoNacional, donde los ricos tenemos lugar", true);
								$tg->setBank($nick,$bank);
							}
						}
						$tg->addDefaultIgnore($nick);
					}
				}
			}
		}
	}
	function ingresar($tg,$nick,$channel,$data) {
		if (!$tg->isNickRegistered($nick)) {
			$tg->msgNoRegistered($channel, $nick);
			$tg->checkFlood($nick);
		}
		else {
			if (empty($data) || (!is_numeric($data) || (strstr($data, '.')))) {
				$tg->msgSintaxError($channel, "!ingresar dinero");
				$tg->checkFlood($nick);
			}
			else {
				$hasBank = $tg->getBank($nick);
				if (!$hasBank) {
					$tg->ircMsg($channel, $tg->h($nick).", necesitas estar dado de alta en un banco para poder ingresar dinero", true);
					$tg->checkFlood($nick);
				}
				else {
					$money = $tg->getMoney($nick);
					if ($data > $money) {
						$tg->ircMsg($channel, $tg->h($nick)." Lo siento ".$tg->h($nick).", pero no tienes".$tg->h(" $data")." topEuros en tu monedero", true);
						$tg->checkFlood($nick);
					}
					else {
						$pos = 0;
						while ($pos < strlen($data)) {
							$res = substr($data,$pos,1);
							if ($res != 0) break;
						}
						$data = substr($data,$pos);
						
						$tg->addBankMoney($nick,$data,'Ingreso');
						$tg->delMoney($nick,$data);
						$tg->bankIntereses($nick,$data);
						$tg->ircMsg($channel,$tg->h($nick).", se han ingresado".$tg->h(' '.$data)." topEuros en tu cuenta del $hasBank", true);
						$tg->addDefaultIgnore($nick);
					}
				}
			}
		}
	}
	function retirar($tg,$nick,$channel,$data) {
		if (!$tg->isNickRegistered($nick)) {
			$tg->msgNoRegistered($channel, $nick);
			$tg->checkFlood($nick);
		}
		else {
			if (empty($data) || (!is_numeric($data) || (strstr($data, '.')))) {
				$tg->msgSintaxError($channel, '!retirar dinero', true);
				$tg->checkFlood($nick);
			}
			else {
				$hasBank = $tg->getBank($nick);
				if (!$hasBank) {
					$tg->ircMsg($channel, $tg->h($nick).", necesitas estar dado de alta en un banco para poder retirar dinero", true);
					$tg->checkFlood($nick);
				}
				else {
					$money = $tg->getBankMoney($nick);
					if ($data > $money) {
						$tg->ircMsg($channel, $tg->h($nick)." Lo siento ".$tg->h($nick).", pero no tienes".$tg->h(" $data")." topEuros en tu cuenta", true);
						$tg->checkFlood($nick);
					}
					else {
						$pos = 0;
						while ($pos < strlen($data)) {
							$res = substr($data,$pos,1);
							if ($res != 0) break;
						}
						$data = substr($data,$pos);
						
						$tg->delBankMoney($nick,$data,'Retirada de dinero');
						$tg->addMoney($nick,$data);
						$tg->ircMsg($channel, $tg->h($nick).", se han retirado".$tg->h(' '.$data)." topEuros de tu cuenta del $hasBank", true);
						$tg->addDefaultIgnore($nick);
					}
				}
			}
		}
	}
	function transferencia($tg,$nick,$channel,$nickDest,$moneyDest) {
		if (!$tg->isNickRegistered($nick)) {
			$tg->msgNoRegistered($channel, $nick);
			$tg->checkFlood($nick);
		}
		else {
			if (empty($moneyDest) || (!is_numeric($moneyDest))) {
				$tg->msgSintaxError($channel, '!transferencia nick dinero', true);
				$tg->checkFlood($nick);
			}
			else {
				$hasBank = $tg->getBank($nick);
				if (!$hasBank) {
					$tg->ircMsg($channel, $tg->h($nick).", necesitas estar dado de alta en un banco para poder hacer transferencias", true);
					$tg->checkFlood($nick);
				}
				else {
					switch ($hasBank) {
						case 'interbanco': $impuesto = 20; break;
						case 'banconacional': $impuesto = 80; break;
					}
					$money = $tg->getBankMoney($nick);
					$toPay = $moneyDest + $impuesto;
					if ($toPay > $money) {
						$tg->ircMsg($channel, "Lo siento ".$tg->h($nick).", pero no tienes".$tg->h(" $toPay")." topEuros en tu cuenta", true);
						$tg->checkFlood($nick);
					}
					else {
						$hasBank = $tg->getBank($nickDest);
						if (!$hasBank) {
							$tg->ircMsg($channel, "Lo siento ".$tg->h($nick).", pero".$tg->h(" $nickDest")." no esta dado de alta en ningun banco", true);
							$tg->checkFlood($nick);
						}
						else {
							$tg->addBankMoney($nickDest,$moneyDest,'Transferencia de '.$nick);
							$tg->bankIntereses($nickDest,$moneyDest);
							$tg->delBankMoney($nick,$toPay,'Transferencia a '.$nickDest);
							$tg->ircMsg($channel, $tg->h($nick).", la transferencia se ha realizado con exito a ".$tg->h($nickDest), true);
							$tg->ircMsg($nickDest, $tg->h($nick)." ha realizado una transferencia a tu favor con valor de".$tg->h(" $moneyDest")." topEuros", true);
							$tg->addDefaultIgnore($nick);
						}
					}
				}
			}
		}
	}
	function saldo($tg,$nick,$channel) {
		if (!$tg->isNickRegistered($nick)) {
			$tg->msgNoRegistered($channel, $nick);
			$tg->checkFlood($nick);
		}
		else {
			$hasBank = $tg->getBank($nick);
			if (!$hasBank) {
				$tg->ircMsg($channel, $tg->h($nick).", necesitas estar dado de alta en un banco para poder consultar el saldo", true);
				$tg->checkFlood($nick);
			}
			else {
				$money = $tg->getBankMoney($nick);
				$tg->ircMsg($channel, $tg->h($nick).", tienes".$tg->h(" $money")." topEuros en tu cuenta del banco", true);
				$tg->addDefaultIgnore($nick);
			}
		}
	}
}
?>